#pragma once

#include <iostream>
#include <cstring>
#include <functional>
#include <unistd.h>
#include <pthread.h>
#include <sys/wait.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include "Log.hpp"
#include "InetAddr.hpp"

using namespace log_ns;

const static int g_sockfd = -1;
const static int g_backlog = 8;
const static in_port_t g_port = 8888;

using command_service_t = std::function<void(int sockfd, InetAddr &addr)>;

enum
{
    SOCKET_ERROR = 1,
    BIND_ERROR,
    LISTEN_ERROR,
    ACCEPT_ERROR
};

class TcpServer
{
private:
    // void Service(int sockfd, InetAddr &addr)
    // {
    //     // 长服务
    //     while (true)
    //     {
    //         char inBuffer[1024]; // 不管什么数据，统一当作字符串读取
    //         ssize_t n = ::read(sockfd, inBuffer, (sizeof inBuffer) - 1);
    //         if (n > 0)
    //         {
    //             inBuffer[n] = 0;
    //             LOG(DEBUG, "[%s] # %s\n", addr.GetAddrStr().c_str(), inBuffer);

    //             std::string echo_string = "[Server echo] # ";
    //             echo_string += inBuffer;
    //             int m = write(sockfd, echo_string.c_str(), echo_string.size());
    //             if (m < 0)
    //             {
    //                 LOG(ERROR, "write() -> Error, errno: %d -> %s\n", errno, strerror(errno));
    //             }
    //             else if (m == 0)
    //             {
    //                 LOG(WARNING, "write() None?\n");
    //             }
    //         }
    //         else if (n == 0)
    //         {
    //             // 在文件系统里表示读到文件结尾，而在网络里表示 Client 结束，想想管道
    //             LOG(INFO, "Client [%s] quit\n", addr.GetAddrStr().c_str());
    //             break;
    //         }
    //         else
    //         {
    //             LOG(ERROR, "read() -> Error, errno: %d -> %s\n", errno, strerror(errno));
    //             break;
    //         }
    //     }
    //     ::close(sockfd);
    // }

    // void DeliveryProcess(int sockfd, InetAddr &addr)
    // {
    //     pid_t id = fork();
    //     if (id == 0)
    //     {
    //         // child
    //         ::close(_listensockfd); // 建议
    //         if (fork() > 0)
    //             exit(0);
    //         // 孤儿进程，执行完任务可以被系统领养
    //         Service(sockfd, addr);
    //         exit(0);
    //     }
    //     // parent
    //     ::close(sockfd); // 必须
    //     // 1、防止父进程误操作
    //     // 2、如果文件描述符不关闭，那么下一个连接到来时会再向 OS 申请新的文件描述符（有个数上限）
    //     //      一旦连接过多，会导致文件描述符不够用，一直不关闭也会导致 文件描述符 泄露问题（只申请，不归还 就有可能导致泄露）
    //     int n = waitpid(id, nullptr, 0);
    //     if (n > 0)
    //     {
    //         LOG(INFO, "Wait child success.\n");
    //     }
    // }

    void DeliveryThread(int sockfd, InetAddr &addr)
    {
        pthread_t tid;
        ThreadData* td = new ThreadData(sockfd, this, addr);
        pthread_create(&tid, nullptr, Execute, td);
    }

    static void* Execute(void* args)
    {
        // 将新线程分离 
        pthread_detach(pthread_self());

        ThreadData* td = static_cast<ThreadData*>(args);
        td->_self->_service(td->_sockfd, td->_addr);

        ::close(td->_sockfd);
        delete td;
        return nullptr;
    }

public:
    TcpServer(command_service_t service, in_port_t port = g_port)
        : _listensockfd(g_sockfd), _port(port), _isrunning(false), _service(service)
    {
    }

    void InitServer()
    {
        // 创建套接字
        _listensockfd = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensockfd < 0)
        {
            LOG(FATAL, "socket() -> Error, errno: %d -> %s\n", errno, strerror(errno));
            exit(SOCKET_ERROR);
        }
        LOG(INFO, "socket create success, sockfd: %d\n", _listensockfd);

        // 绑定套接字地址至内核
        struct sockaddr_in local;
        memset(&local, 0, sizeof local);
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = INADDR_ANY; // 随机地址绑定
        if ((::bind(_listensockfd, (struct sockaddr *)&local, sizeof local)) < 0)
        {
            LOG(FATAL, "bind() -> Error, errno: %d -> %s\n", errno, strerror(errno));
            exit(BIND_ERROR);
        }
        LOG(INFO, "bind success\n");

        // 因为 TCP 是面向连接的，所以 TCP 未来要能够不断获取连接
        // 所以要将套接字设为 Listen 监听状态
        if ((::listen(_listensockfd, g_backlog)) < 0)
        {
            LOG(FATAL, "listen() -> Error, errno: %d -> %s\n", errno, strerror(errno));
            exit(LISTEN_ERROR);
        }
        LOG(INFO, "listen success\n");
    }

    void Loop()
    {
        // signal(SIGCHLD, SIG_IGN);
        _isrunning = true;
        while (_isrunning)
        {
            // 获取新连接
            struct sockaddr_in client;
            socklen_t len = sizeof client;
            int sockfd = ::accept(_listensockfd, (struct sockaddr *)&client, &len);
            if (sockfd < 0)
            {
                LOG(WARNING, "accept() -> Error, errno: %d -> %s\n", errno, strerror(errno));
                continue;
            }
            InetAddr addr(client);
            LOG(INFO, "Get a new link, Client info: [%s], sockfd: %d\n", addr.GetAddrStr().c_str(), sockfd);

            // 给 Client 提供服务

            // Version - 3 ---> 多线程版本（原生接口手撕）
            DeliveryThread(sockfd, addr);

        }
        _isrunning = false;
    }

    ~TcpServer()
    {
    }

private:
    int _listensockfd; // 监听套接字，没有你怎么获取连接？
    in_port_t _port;   // 肯定需要端口号，不然怎么创建套接字？
    bool _isrunning;

    command_service_t _service;

    struct ThreadData
    {
        ThreadData(int sockfd, TcpServer* self, const InetAddr& addr)
            : _sockfd(sockfd), _self(self), _addr(addr)
        {}

        int _sockfd;
        TcpServer* _self;
        InetAddr _addr;
    };
};
